5 REM--AHOY!--JUNE ISSUE--MEMORY MANAGEMENT TEST 9--PROG PAGE 81
10 REM:FOR TAPE-SAVE SECOND
20 REM:MEMORY MANAGEMENT TEST 9
30 REM:LOADS INTO $C000 BLOCK IN THE    COMMODORE 64
60 IF PEEK(251)=1 GOTO 100
70 T9$="[147]TEST 9 NOW ACTIVE":PRINTT9$
80 POKE 251,1:REM SET LOAD COMPLETE FLAG
90 GOTO 110
100 PRINT T9$
110 PRINT "ENTER 8[146] FOR TEST 8"
130 GET IN$:IF IN$=""GOTO130
140 IN=VAL(IN$)
150 IF IN<>8 GOTO 110
170 POKE 44,8:GOTO 10:REM BACK TO NORMAL RAM